home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 1 / ETO Development Tools 1.iso / Essentials / MacApp Documentation / MacApp AppleLink Messages / MacApp.Tech$ Oct 89 / Z0095-Re How to detect po-Oct89 < prev    next >
Encoding:
Text File  |  1989-10-16  |  1.0 KB  |  36 lines  |  [TEXT/GEOL]
  1. Item    1167045                         16-Oct-89        17:02
  2.  
  3. From:   D1037                           Jasik Designs, Steve Jasik,PRT
  4.  
  5. To:     D2086                           Efficient Field Svc, C Faith,PRT
  6.  
  7. cc:     MACAPP.TECH$                    MACAPP Tech
  8.  
  9. Sub:    Re: How to detect potential…
  10.  
  11. Curtis,
  12.  
  13. If you mean classes, then all the info is arond at run time.
  14. The variable pOrderedClassids is a handle to the table of ordered class ID's.
  15.  
  16. The Debugger prints them out via the following code which is similar to the
  17. code in MacApp:
  18.  
  19.    for i := 1 to n_classes do begin { display class's in Lexigraphic order }
  20.    clas_ID := pOrderedClass^^[i];
  21.    GetClassNameFromID(clas_ID,clName);
  22.    wrt_hex(clas_ID,-3);  wrt_str('  ');  wrt_str(clName);
  23.    dump_WLine;
  24.    j := GetSuperclassID(clas_ID);
  25.    if j <> 0 then begin
  26.    GetClassNameFromID(j,clName);
  27.    wst := '         ';  wrt_str(clName);
  28.    dump_WLine;
  29.    end;
  30.  
  31. It is fairly easy to build the assoicated graph as each class only has one
  32. superclass.
  33.  
  34. Steve
  35.  
  36.